10月31日台北變冷了~

今天來介紹一個好用的package - ggrepel

我主要使用是在加上標籤時

這次使用 mtcars 來當做我們的資料集

選定 data = mtcars 並選出馬力大於100的車輛

library(ggplot2)
library(ggrepel)
#找出資料
dat = subset(mtcars,hp>100)

然後按照之前的做法使用ggplot

ggplot(dat,aes(x = hp , y = mpg)) + 
  geom_point()+
  geom_text(aes(label = row.names(dat)))

看到圖上的點和字都重疊了實在是非常不爽

於是我們將程式碼改寫

使用ggrepel

ggplot(dat,aes(x = hp , y = mpg)) + 
  geom_point()+
  geom_text_repel(aes(label = row.names(dat)))

太神奇了!

使用 ggrepel 指令可以自動將字閃過點

是個非常好用的功能呢!

End.